home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / id007.dxr / 00035.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  449 b   |  19 lines
  1. on exitFrame
  2.   set LastTick to the ticks
  3.   set OriginalTick to the ticks
  4.   repeat while (the ticks - OriginalTick) < 120
  5.     set x to 5 * (the ticks - LastTick)
  6.     set LastTick to the ticks
  7.     set the locH of sprite 5 to 288
  8.     set the locV of sprite 5 to the locV of sprite 5 + x
  9.     updateStage()
  10.   end repeat
  11. end
  12.  
  13. on mouseUp
  14.   set the visible of sprite 5 to 0
  15.   set the visible of sprite 6 to 0
  16.   set the visible of sprite 7 to 0
  17.   go(81)
  18. end
  19.